Namespace BEL.Concesion
	<Serializable()> _
	Public Class Contrato
		Implements System.IDisposable
#Region "Variables privadas"
		Private _co_contrato As System.Int32
		Private _tx_numero As System.String
		Private _fe_inicio As System.DateTime
		Private _fe_fin As System.DateTime
		Private _tx_rutacontrato As System.String
		Private _ss_monto As System.Double
		Private _tx_observacion As System.String
		Private _no_estado As System.String
		Private _proveedor As BEL.Concesion.Juridica
		Private _servicio As BEL.Servicio.Servicio
		Private _EsNuevo As System.Boolean
#End Region
#Region "Constructor"
		Public Sub New()
			Me._co_contrato = 0
			Me._tx_numero = [String].Empty
			Me._fe_inicio = [Date].Now
			Me._fe_fin = [Date].Now
			Me._tx_rutacontrato = [String].Empty
			Me._ss_monto = 0.0
			Me._tx_observacion = [String].Empty
			Me._no_estado = [String].Empty

			Me._proveedor = New BEL.Concesion.Juridica
			Me._servicio = New BEL.Servicio.Servicio
		End Sub
#End Region
#Region "Propiedades"
		Public Property CO_CONTRATO() As System.Int32
			Get
				Return _co_contrato
			End Get
			Set(ByVal value As System.Int32)
				_co_contrato = value
			End Set
		End Property
		Public Property TX_NUMERO() As System.String
			Get
				Return _tx_numero
			End Get
			Set(ByVal value As System.String)
				_tx_numero = value
			End Set
		End Property
		Public Property FE_INICIO() As System.DateTime
			Get
				Return _fe_inicio
			End Get
			Set(ByVal value As System.DateTime)
				_fe_inicio = value
			End Set
		End Property
		Public Property FE_FIN() As System.DateTime
			Get
				Return _fe_fin
			End Get
			Set(ByVal value As System.DateTime)
				_fe_fin = value
			End Set
		End Property
		Public Property TX_RUTACONTRATO() As System.String
			Get
				Return _tx_rutacontrato
			End Get
			Set(ByVal value As System.String)
				_tx_rutacontrato = value
			End Set
		End Property
		Public Property SS_MONTO() As System.Double
			Get
				Return _ss_monto
			End Get
			Set(ByVal value As System.Double)
				_ss_monto = value
			End Set
		End Property
		Public Property TX_OBSERVACION() As System.String
			Get
				Return _tx_observacion
			End Get
			Set(ByVal value As System.String)
				_tx_observacion = value
			End Set
		End Property
		Public Property NO_ESTADO() As System.String
			Get
				Return _no_estado
			End Get
			Set(ByVal value As System.String)
				_no_estado = value
			End Set
		End Property
		Public Property PROVEEDOR() As BEL.Concesion.Juridica
			Get
				Return _proveedor
			End Get
			Set(ByVal value As BEL.Concesion.Juridica)
				_proveedor = value
			End Set
		End Property
		Public Property SERVICIO() As BEL.Servicio.Servicio
			Get
				Return _servicio
			End Get
			Set(ByVal value As BEL.Servicio.Servicio)
				_servicio = value
			End Set
		End Property
#End Region
#Region "IDisposable Members"
		Public Sub Dispose() Implements IDisposable.Dispose
			GC.Collect()
		End Sub
#End Region
#Region "IGenerico Members"
		Public Property EsNuevo() As System.Boolean
			Get
				Return _EsNuevo
			End Get
			Set(ByVal value As System.Boolean)
				_EsNuevo = value
			End Set
		End Property
#End Region
	End Class
End Namespace